## Need pacman to load and install packages
#install.packages("pacman")
library(pacman)
#Cross-Lagged Panel: Dutch LISS Panel-------------
#Get access to LISS data: see "Data Access.pdf"
rm(list = ls())
source("liss_create_data.R") # pre-processing data
source("liss_results.R") # reproduces all results in the main text SI 2 and SI 9


rm(list = ls())
#Cross-Lagged Panel: GESIS Panel -------------
#Get access to LISS data: see "Data Access.pdf"
source("GESIS_data_cleaning.R") #pre-processing data
source("GESIS_results.R") # reproduces all results in the main text SI 2 and SI 9

rm(list = ls())
#Cross-Lagged Panel: GSS Panel -----------
#download data from Dataverse
source("GSS_data_cleaning.R") #pre-processing data
source("GSS_results.R") # reproduces all results in the main text SI 3 and SI 9

rm(list = ls())
#RICPLM vs CPLM ------------
source("simulations.R")

rm(list = ls())
#Big Five Experiment---------
#download data from Dataverse and set extension in script
source("B5_Experiment_code.R") # pre-processing data
source("B5_Experiment_results.R") # reproduces all results in the main text SI 5 and SI 9

rm(list = ls())
#Authoritarianism Experiment-----------
#download data from Dataverse and set extension in script
source("Auth_Experiment_code_results.R") # pre-processing & reproduces all results in the main text SI 6 and SI 9

rm(list = ls())
#Individual data meta-analysis of the experiments-------
source("Experiment_pooled.R") #main text, SI.8 and SI.9
